home *** CD-ROM | disk | FTP | other *** search
/ Bangkok Nights / Bangkok Nights.iso / pc / pc / pcpz.dxr / 00038_Field_blank descrip.txt < prev    next >
Text File  |  1995-04-11  |  2KB  |  71 lines
  1.   on startMovie
  2.   set the centerstage to FALSE
  3.   
  4.   clearGlobals
  5.   set cd = the colordepth
  6.   
  7.   set cd = the colordepth
  8.   if cd > 16 then
  9.     alert "This application requires 16-bit color or less."
  10.     quit
  11.   end if
  12.   
  13.   set its_a_mac = the machineType < 255
  14.   
  15.   if the quickTimePresent <>1 then
  16.     if its_a_mac then
  17.       
  18.       alert "QuickTime system extension required. ┬¼
  19. Place the QuickTime system extension in your system folder and restart your Macintosh."
  20.     else
  21.       alert "QuickTime DLL's required. ┬¼
  22. Execute this application from the CD-ROM."
  23.     end if    
  24.     quit
  25.   end if 
  26.   
  27.   set the sound of cast A24 to 0
  28.   set the sound of cast A25 to 0
  29.   set the sound of cast A27 to 0
  30.   
  31.   when mousedown then go to frame "startmovie"
  32. end startMovie  
  33.  
  34. -- do an offscreen load of a quicktime movie
  35. on osLoad msprite, x, y
  36.   global qtframe, cursprite
  37.   
  38.   set cursprite = msprite
  39.   set cn = the castnum of sprite cursprite
  40.   set the sound of cast cn to 0
  41.   set the MOVIERATE of sprite cursprite = 0
  42.   set the MOVIETIME of sprite cursprite = 1
  43.   puppetSprite cursprite, TRUE
  44.   set the locH of sprite cursprite to x
  45.   set the locV of sprite cursprite to y
  46.   set the sound of cast cn to 1
  47.   updatestage
  48.   set the MOVIETIME of sprite cursprite = 1
  49.   set the MOVIERATE of sprite cursprite = 1
  50.   set qtframe = -1
  51. end osLoad
  52.  
  53.  
  54.  
  55. -- Is the movie still running?
  56. on movieRunning
  57.   global qtframe, cursprite
  58.   
  59.   if the MOVIETIME of sprite cursprite <> qtframe then
  60.     set qtframe = the MOVIETIME of sprite cursprite
  61.     return TRUE
  62.   else
  63.     puppetSprite cursprite, FALSE -- release the movie
  64.     cursor -1   -- get the arrow back
  65.     return FALSE
  66.   end if
  67. end movieRunning
  68.  
  69.  
  70.  
  71.